;zona de date
.data
n: 5
;zona de cod
.code
mov r1, n
add r2, 1
call fact

halt
;proceduri
fact:
push r1
sub r1, 1
beq et

call fact
et:
pop r3
mul r2, r3 
ret
